home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / gnu / dld-3_23.lha / dld-3.2.3 / ul_file.c < prev    next >
C/C++ Source or Header  |  1991-05-30  |  1KB  |  64 lines
  1. /* unlink_file.c -- unlink a given object file. */
  2.  
  3. /* This file is part of DLD, a dynamic link/unlink editor for C.
  4.    
  5.    Copyright (C) 1990 by W. Wilson Ho.
  6.  
  7.    The author can be reached electronically by how@cs.ucdavis.edu or
  8.    through physical mail at:
  9.  
  10.    W. Wilson Ho
  11.    Division of Computer Science
  12.    University of California at Davis
  13.    Davis, CA 95616
  14.  */
  15.  
  16. /* This program is free software; you can redistribute it and/or modify it
  17.    under the terms of the GNU General Public License as published by the
  18.    Free Software Foundation; either version 1, or (at your option) any
  19.    later version. */
  20.  
  21. #include "defs.h"
  22.  
  23. static struct file_entry *
  24. search_files (entry, name)
  25. register struct file_entry *entry;
  26. register char *name;
  27. {
  28.     while (entry) {
  29.     if (entry->library_flag) {
  30.         register struct file_entry *subentry;
  31.  
  32.         if ((subentry = search_files (entry->subfiles, name)) != 0)
  33.         return subentry;
  34.     } else {
  35.         if (!strcmp (entry->local_sym_name, name))
  36.         return entry;
  37.         if (entry->local_sym_name != entry->filename)
  38.         if (!strcmp (entry->filename, name))
  39.             return entry;
  40.     }
  41.  
  42.     entry = entry->chain;
  43.     }
  44.     return 0;
  45. } /* search_files */
  46.  
  47.  
  48. dld_unlink_by_file (name, force)
  49. char *name;
  50. int force;
  51. {
  52.     register struct file_entry *entry;
  53.  
  54.     if (entry = search_files (_dld_latest_entry, name)) {
  55.     _dld_unlink_entry (entry, force);
  56.     return 0;
  57.     }
  58.  
  59.     dld_errno = DLD_EUNDEFSYM;
  60.     return dld_errno;
  61. } /* dld_unlink_by_file */
  62.  
  63.  
  64.